home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 52 / Amiga Format AFCD52 (Issue 136, May 2000).iso / -serious- / workbench / iconimagecopier / install < prev    next >
Text File  |  2000-02-28  |  9KB  |  277 lines
  1. (SET @default-dest "")
  2.  
  3. (IF (= @language "svenska")
  4.     (
  5.         (SET #welcome "\n\nDetta installationsskript installerar IconImageCopier åt dig!\n\n")
  6.         (SET #needKick ("\n'IconImageCopier' kräver åtminstone Workbench version 36." ) )
  7.         (SET #componentsPrompt "Välj vilka delar av 'IconImageCopier' du vill installera.")
  8.         (SET #componentsPromptHelp "Det är nödvändigt att installera programmet. Du rekommenderas att installera språkfiler och manual också.")
  9.         (SET #destPrompt "Var vänlig välj vilken låda 'IconImageCopier' skall sparas i.\nIngen låda kommer att skapas.")
  10.         (SET #destPromptHelp "Programmet kan sparas var som helst på din hårddisk, se bara till att du vet var du har det.\n\n")
  11.         (SET #docPrompt "Välj vilken låda manualen skall sparas i.")
  12.         (SET #docPromptHelp "Spara manualen där du kan hitta den helt enkelt.\n\n")
  13.         (SET #translatePrompt "Välj vilka översättningsfiler som skall installeras.")
  14.         (SET #translatePromptHelp "Installera översättningsfilerna om du har tänkt översätta IconImageCopier till andra språk än de som medföljer.\n\n")
  15.         (SET #translateDirPrompt "Välj vilken låda som översättningsfilerna skall sparas i.")
  16.         (SET #translateDirPromptHelp "Installera översättningsfilerna var du vill. 'LOCALE:Catalogs' är den rekommenderade lådan.\n\n")
  17.         (SET #localePrompt "Välj vilka språk förutom engelska som skall installeras.")
  18.         (SET #localePromptHelp "Välj endast ditt eget språk om det finns.\n\n")
  19.         (SET #iconPrompt "Välj var kopiera och klistra in-ikonerna skall sparas.")
  20.         (SET #iconPromptHelp "Spara ikonerna var du vill. De rekommenderade platserna är där IconImageCopier ligger och i  'ENVARC:sys/'.\n\n")
  21.         (SET #exitHelp "Prova din nya ikonbildskopierare som finns i '%s'!\n\n")
  22.         (SET #scriptInfo "Denna fil tillhör avinstallationsskriptet till IconImageCopier.")
  23.         (SET #progText "Programmet")
  24.         (SET #docsText "Manualen")
  25.         (SET #localeText "Språkfiler")
  26.         (SET #translationsText "Translation files")
  27.         (SET #limitationInfo "\n\nObservera att det finns några begränsningar i programmet:\n\n")
  28.         (SET #os35Info "Alla kopierade ikoner i newicons-formatet kommer automatiskt att konverteras till OS3.5-ikoner. Läs manualen för mer information.")
  29.         (SET #newIconInfo "Eftersom du har newicons.library installerat kan du inte kopiera standard-ikoner och du kan inte skapa ikoner till filer. Läs manualen för mer information.")
  30.         (SET #oldIconInfo "Alla newicons-bilder kommer att lämnas orörda när du kopierar ikonbilder. Läs manualen för mer information.")
  31.     )
  32.     (
  33.         (SET #welcome "\n\nThis installer script will install IconImageCopier for you!\n\n")
  34.         (SET #needKick ("\n'IconImageCopier' needs at least Workbench Version 36." ) )
  35.         (SET #componentsPrompt "Please choose which parts of 'IconImageCopier' you wish to install.")
  36.         (SET #componentsPromptHelp "It is necessary to install the program. It is recommended that you install locale files and documentation as well.")
  37.         (SET #destPrompt "Please choose the destination directory for 'IconImageCopier'.\nA drawer will NOT be created.")
  38.         (SET #destPromptHelp "The program can be stored anywhere on your harddisk, just make sure that you know where you put it.\n\n")
  39.         (SET #docPrompt "Select the directory for the documentation file.")
  40.         (SET #docPromptHelp "Store the documentation where you can find it.\n\n")
  41.         (SET #translatePrompt "Select which translation files should be installed.")
  42.         (SET #translatePromptHelp "Install the translation files if you intend to translate IconImageCopier to other languages than the existing ones.\n\n")
  43.         (SET #translateDirPrompt "Select a directory for the translation files.")
  44.         (SET #translateDirPromptHelp "Install the translation files anywhere you like. 'LOCALE:Catalogs' is the recommended drawer.\n\n")
  45.         (SET #localePrompt "Select the languages apart from english that you wish to install.")
  46.         (SET #localePromptHelp "Select your own language if it exists.\n\n")
  47.         (SET #iconPrompt "Select where the copy and paste icons should be placed.")
  48.         (SET #iconPromptHelp "Place the icons whereever you like. Preferred places are where the executable is and in 'ENVARC:sys/'.\n\n")
  49.         (SET #exitHelp "Try your new icon image copier in '%s'!\n\n")
  50.         (SET #scriptInfo "This file belongs to the deinstaller script for IconImageCopier.\n\n")
  51.         (SET #progText "The program")
  52.         (SET #docsText "The documentation")
  53.         (SET #localeText "The locale files")
  54.         (SET #translationsText "The translation files")
  55.         (SET #limitationInfo "\n\nNote that there are some program limitations:\n\n")
  56.         (SET #os35Info "All copied newicon images will be converted to OS3.5 icons. Read the documentation for more information.")
  57.         (SET #newIconInfo "Since you have newicons.library installed you cannot copy default icons and you cannot create icons for files. Read the documentation for more information.")
  58.         (SET #oldIconInfo "All newicons images will be left untouched when copying icon images. Read the documentation for more information.")
  59.     )
  60. )
  61.  
  62. (WELCOME #welcome)
  63.  
  64. (IF (< (/ (GETVERSION) 65536) 36)
  65.     (ABORT #needKick)
  66. )
  67.  
  68. (IF (>= (/ @installer-version 65536) 44)
  69.     (EFFECT "center" "radial" $000000 $0000FF)
  70. )
  71.  
  72. (COMPLETE 0)
  73.  
  74. (SET #destDir "SYS:Tools")
  75.  
  76. (SET #components
  77.     (ASKOPTIONS (PROMPT  #componentsPrompt)
  78.         (HELP    #componentsPromptHelp)
  79.         (CHOICES #progText #docsText #localeText #translationsText)
  80.         (DEFAULT 7)
  81.     )
  82. )
  83.  
  84. (IF (IN #components 0)
  85.     (
  86.         (IF (>= (/ @installer-version 65536) 44)
  87.             (MESSAGE (cat #limitationInfo #os35Info))
  88.             (IF (= 1 (EXISTS "LIBS:newicon.library"))
  89.                 (MESSAGE (cat #limitationInfo #newIconInfo))
  90.                 (MESSAGE (cat #limitationInfo #oldIconInfo))
  91.             )
  92.         )
  93.         (IF (> @user-level 0)
  94.             (SET #destDir
  95.                 (ASKDIR (PROMPT  #destPrompt)
  96.                     (HELP    (cat #destPromptHelp @askdir-help) )
  97.                     (DEFAULT #destDir )
  98.                 )
  99.             )
  100.         )
  101.         (SET #iconDir #destDir)
  102.         (IF (> @user-level 1)
  103.             (SET #iconDir
  104.                 (ASKDIR (PROMPT  #iconPrompt)
  105.                     (HELP    (cat #iconPromptHelp @askdir-help) )
  106.                     (DEFAULT #destDir)
  107.                 )
  108.             )
  109.         )
  110.     )
  111. )
  112.  
  113.  
  114. (IF (IN #components 1)
  115.     (SET #docDir
  116.         (ASKDIR (PROMPT  #docPrompt)
  117.                 (HELP    (cat #docPromptHelp @askdir-help))
  118.                 (DEFAULT "Help:")
  119.         )
  120.     )
  121. )
  122.  
  123. (IF (IN #components 2)
  124.     (
  125.         (SET #defLanguages
  126.             (
  127.                 (IF (= @language "svenska") %1 0)
  128.             )
  129.         )
  130.  
  131.         (SET #languages
  132.             (ASKOPTIONS (PROMPT  #localePrompt)
  133.                 (HELP    #localePromptHelp)
  134.                 (CHOICES "svenska")
  135.                 (DEFAULT #defLanguages)
  136.             )
  137.         )
  138.     )
  139. )
  140.  
  141. (IF (IN #components 3)
  142.     (
  143.         (SET #translators 0)
  144.         (IF (> @user-level 1)
  145.             (
  146.                 (SET #translators
  147.                     (ASKOPTIONS (PROMPT  #translatePrompt)
  148.                         (HELP    #translatePromptHelp)
  149.                         (CHOICES "IconImageCopier.cd" "IconImageCopier.ct")
  150.                         (DEFAULT 0)
  151.                     )
  152.                 )
  153.                 (IF (<> #translators 0)
  154.                     (SET #translateDir
  155.                         (ASKDIR (PROMPT #translateDirPrompt)
  156.                             (HELP #translateDirPromptHelp)
  157.                             (DEFAULT "LOCALE:Catalogs")
  158.                         )
  159.                     )
  160.                 )
  161.             )
  162.         )
  163.     )
  164. )
  165.  
  166. (COMPLETE 50)
  167.  
  168. (IF (IN #components 0)
  169.     (
  170.         (COPYFILES (SOURCE "IconImageCopier")
  171.                    (HELP @copyfiles-help)
  172.                    (DEST #destDir)
  173.                    (INFOS)
  174.         )
  175.  
  176.         (COPYFILES (SOURCE "CopyImage.info")
  177.                    (HELP @copyfiles-help)
  178.                    (DEST #iconDir)
  179.         )
  180.  
  181.         (COPYFILES (SOURCE "PasteImage.info")
  182.                    (HELP @copyfiles-help)
  183.                    (DEST #iconDir)
  184.         )
  185.  
  186.         (TOOLTYPE  (DEST (TACKON #destDir "IconImageCopier"))
  187.                    (SETTOOLTYPE "COPYIMAGE" (TACKON #iconDir "CopyImage"))
  188.         )
  189.  
  190.         (TOOLTYPE  (DEST (TACKON #destDir "IconImageCopier"))
  191.                    (SETTOOLTYPE "PASTEIMAGE" (TACKON #iconDir "PasteImage"))
  192.         )
  193.     )
  194. )
  195.  
  196.  
  197. (IF (IN #components 1)
  198.     (COPYFILES (SOURCE "IconImageCopier.guide")
  199.                (DEST   #docDir)
  200.                (HELP @copyfiles-help)
  201.                (INFOS)
  202.     )
  203. )
  204.  
  205. (IF (IN #components 2)
  206.     (IF (IN #languages 0)
  207.         (COPYFILES (SOURCE "Catalogs/svenska")
  208.                (PATTERN "#?")
  209.                (FILES)
  210.                (DEST "LOCALE:Catalogs/svenska")
  211.                    (HELP @copyfiles-help)
  212.         )
  213.     )
  214. )
  215.  
  216. (IF (IN #components 3)
  217.     (
  218.         (IF (IN #translators 0)
  219.             (COPYFILES (SOURCE "catalogs/IconImageCopier.cd")
  220.                    (DEST #translateDir)
  221.                        (HELP @copyfiles-help)
  222.             )
  223.         )
  224.         (IF (IN #translators 1)
  225.             (COPYFILES (SOURCE "catalogs/IconImageCopier.ct")
  226.                    (DEST #translateDir)
  227.                        (HELP @copyfiles-help)
  228.             )
  229.         )
  230.     )
  231. )
  232.  
  233. (TEXTFILE
  234.     (DEST "T:Deinstall_IconImageCopier")
  235.     (INCLUDE "S:Deinstall_IconImageCopier")
  236.     (APPEND (";%s\n" #scriptInfo ))
  237.     (APPEND "FailAt 100\n" )
  238.     (IF (IN #components 0)
  239.         (
  240.             (APPEND ("Delete >NIL: %s\n" (tackon #destDir "IconImageCopier")))
  241.             (APPEND ("Delete >NIL: %s\n" (tackon #destDir "IconImageCopier.info")))
  242.             (APPEND ("Delete >NIL: %s\n" (tackon #iconDir "CopyImage.info")))
  243.             (APPEND ("Delete >NIL: %s\n" (tackon #iconDir "PasteImage.info")))
  244.         )
  245.     )
  246.  
  247.     (IF (IN #components 1)
  248.         (
  249.             (APPEND ("Delete >NIL: %s\n" (tackon #docDir "IconImageCopier.guide")))
  250.             (APPEND ("Delete >NIL: %s\n" (tackon #docDir "IconImageCopier.guide.info")))
  251.         )
  252.     )
  253.  
  254.     (IF (IN #components 2)
  255.         (IF (IN #languages 0)
  256.             (APPEND "Delete >NIL: LOCALE:Catalogs/svenska/IconImageCopier.catalog\n" )
  257.         )
  258.     )
  259.  
  260.     (IF (IN #components 3)
  261.         (
  262.             (IF (IN #translators 0)
  263.                 (APPEND ("Delete >NIL: %s\n" (TACKON #translateDir "IconImageCopier.cd")))
  264.             )
  265.             (IF (IN #translators 1)
  266.                 (APPEND ("Delete >NIL: %s\n" (TACKON #translateDir "IconImageCopier.ct")))
  267.             )
  268.         )
  269.     )
  270. )
  271.  
  272. (COPYFILES (SOURCE "T:Deinstall_IconImageCopier") (DEST "S:"))
  273.  
  274. (COMPLETE 100)
  275.  
  276. (EXIT (#exitHelp #destDir))
  277.